home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / pc / 3-Presentations / Apple Demos / Training / HyperCard 2.0 Training / •HC 2.0-4 / card_6439.txt < prev    next >
Text File  |  1990-04-06  |  4KB  |  176 lines
  1. -- card: 6439 from stack: in.0-4
  2. -- bmap block id: 13914
  3. -- flags: 0000
  4. -- background id: 7102
  5. -- name: Ex 3.1
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 8005
  11. -- rect: left=207 top=122 right=145 bottom=417
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 174
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: At stack creation
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   hide fld "feedback"
  23.   set hilite of me to not hilite of me
  24. end mouseUp
  25.  
  26.  
  27.  
  28. -- part 3 (button)
  29. -- low flags: 00
  30. -- high flags: 8005
  31. -- rect: left=207 top=144 right=167 bottom=417
  32. -- title width / last selected line: 0
  33. -- icon id / first selected line: 0 / 0
  34. -- text alignment: 1
  35. -- font id: 174
  36. -- text size: 12
  37. -- style flags: 0
  38. -- line height: 16
  39. -- part name: From a script
  40. ----- HyperTalk script -----
  41. on mouseUp
  42.   hide fld "feedback"
  43.   set hilite of me to not hilite of me
  44. end mouseUp
  45.  
  46.  
  47.  
  48. -- part 4 (button)
  49. -- low flags: 00
  50. -- high flags: 8005
  51. -- rect: left=207 top=166 right=189 bottom=417
  52. -- title width / last selected line: 0
  53. -- icon id / first selected line: 0 / 0
  54. -- text alignment: 1
  55. -- font id: 174
  56. -- text size: 12
  57. -- style flags: 0
  58. -- line height: 16
  59. -- part name: At stack compaction
  60. ----- HyperTalk script -----
  61. on mouseUp
  62.   hide fld "feedback"
  63.   set hilite of me to not hilite of me
  64. end mouseUp
  65.  
  66.  
  67.  
  68. -- part 5 (button)
  69. -- low flags: 00
  70. -- high flags: 8005
  71. -- rect: left=207 top=188 right=211 bottom=455
  72. -- title width / last selected line: 0
  73. -- icon id / first selected line: 0 / 0
  74. -- text alignment: 1
  75. -- font id: 174
  76. -- text size: 12
  77. -- style flags: 0
  78. -- line height: 16
  79. -- part name: While copying a card to another window
  80. ----- HyperTalk script -----
  81. on mouseUp
  82.   hide fld "feedback"
  83.   set hilite of me to not hilite of me
  84. end mouseUp
  85.  
  86.  
  87.  
  88. -- part 11 (button)
  89. -- low flags: 00
  90. -- high flags: A003
  91. -- rect: left=344 top=322 right=339 bottom=460
  92. -- title width / last selected line: 0
  93. -- icon id / first selected line: 0 / 0
  94. -- text alignment: 1
  95. -- font id: 0
  96. -- text size: 12
  97. -- style flags: 0
  98. -- line height: 16
  99. -- part name: Correct Answer
  100. ----- HyperTalk script -----
  101. -- This handler shows the correct answer.
  102. on mouseUp
  103.   hideFeedback
  104.   repeat with i=1 to 4
  105.     set the hilite of btn i to false
  106.   end repeat
  107.   repeat 3
  108.     set the hilite of btn 1 to false
  109.     set the hilite of btn 3 to false
  110.     set the hilite of btn 4 to false
  111.     wait 25
  112.     set the hilite of btn 1 to true
  113.     set the hilite of btn 3 to true
  114.     set the hilite of btn 4 to true
  115.     wait 25
  116.   end repeat
  117.   ans 5
  118. end mouseUp
  119.  
  120.  
  121.  
  122. -- part 13 (button)
  123. -- low flags: 00
  124. -- high flags: A003
  125. -- rect: left=394 top=300 right=319 bottom=460
  126. -- title width / last selected line: 0
  127. -- icon id / first selected line: 0 / 0
  128. -- text alignment: 1
  129. -- font id: 0
  130. -- text size: 12
  131. -- style flags: 0
  132. -- line height: 16
  133. -- part name: Done
  134. ----- HyperTalk script -----
  135. -- This handler checks the user's answer and provides feedback.
  136. -- The "ans" and "noAns" handlers are in the stack script.
  137.  
  138. on mouseUp
  139.   put empty into choices
  140.  
  141.   repeat with i=1 to 4
  142.     put i into last char of ansName
  143.     if the hilite of btn i is true then
  144.       put i after choices
  145.     end if
  146.   end repeat
  147.  
  148.   if choices is fld "answer" then ans 1
  149.   else  if length(choices) is 4 then ans 4
  150. else if  hilite of btn 2 is true then ans 3
  151. else if length(choices) is 0 then noAns
  152. else ans 2
  153. end mouseUp
  154.  
  155.  
  156.  
  157. -- part contents for background part 9
  158. ----- text -----
  159. 1 of 7
  160.  
  161. -- part contents for background part 6
  162. ----- text -----
  163.  
  164. Select all the instances when you can change the size of a card.
  165.  
  166. -- part contents for background part 19
  167. ----- text -----
  168. That‚Äôs right. You can change the size of a stack at any of these times.
  169. You‚Äôve gotten part of the answer. Try again.
  170. No, you can‚Äôt change the size of a card from a script. Try again.
  171. Sorry, but you can‚Äôt change a card‚Äôs size in all of these cases. Try again.
  172. This is the correct answer. You can change the card size when the stack is created, when you compact, and while copying a card to another window.
  173.  
  174. -- part contents for background part 21
  175. ----- text -----
  176. 134